home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / program / swaga_c.zip / CMDLINE.SWG / 0002_Get Command Line.pas < prev    next >
Pascal/Delphi Source File  |  1993-05-28  |  499b  |  21 lines
  1. {There are basically two ways of retrieving the command line. One way is to use
  2. the ParamStr Variable: ParamStr(1) contains the first paramter, ParamStr(2)
  3. contains the second parameter etc. Another way is to fetch the entire command
  4. line String from your environment. This can be done as follows:
  5. }
  6.  
  7. Program GetCommandLine;
  8.  
  9. Type
  10.  
  11.   PCommandLine = ^TCommandLine;
  12.   TCommandLine = String;
  13.  
  14. Var
  15.  
  16.   CommandLine : PCommandLine;
  17.  
  18. begin
  19.   CommandLine := Ptr ( PrefixSeg, $80 );
  20. end.
  21.